SET SERVEROUTPUT ON;

CREATE OR REPLACE PROCEDURE CURSORSAMPLE2
AS
  CURSOR c1 IS
    SELECT lastname, major FROM Student
    WHERE credits > 30;
BEGIN
  FOR person IN c1
  LOOP
    DBMS_OUTPUT.PUT_LINE ('Name = ' || person.lastname || ' has major = ' || person.major);
  END LOOP;
END;
/
